home *** CD-ROM | disk | FTP | other *** search
/ ADA Programming Guide / ADA Programming Guide.iso / ada_gwu / mouse.asm < prev    next >
Encoding:
Assembly Source File  |  1996-01-30  |  1.5 KB  |  72 lines

  1. ;  HELP ENGINE PARA GWADA
  2. ;
  3. ;  Módulo MOUSE.ASM
  4. ;  Rotinas de tratamento de mouse
  5. ;
  6. ;  Trabalho de conclusao
  7. ;  Bacharelado em Informatica
  8. ;
  9. ;  Ulrich Peters
  10. ;
  11.  
  12. .MODEL COMPACT
  13.  
  14. extrn _mouse_x    ; posiçao horizontal do mouse
  15. extrn _mouse_y    ; posiçao vertical do mouse
  16. extrn _buttons    ; estado dos botoes
  17.  
  18. .DATA
  19.  
  20. .STACK
  21.  
  22. .CODE
  23. PUBLIC _mouse_reset
  24. PUBLIC _mouse_enable
  25. PUBLIC _mouse_disable
  26. PUBLIC _mouse_read
  27.  
  28. ;===========================================
  29. ; int mouse_reset(void)
  30. ; retorna -1, caso mouse presente
  31. ;          0, caso mouse ausente
  32. ; ==========================================
  33. _mouse_reset proc
  34.         mov ax,0
  35.         int 33h
  36.         ret
  37. _mouse_reset endp
  38.  
  39. ; ===================================================
  40. ; void mouse_enable(void)
  41. ; habilita a representaçao do cursor do mouse na tela
  42. ; ===================================================
  43. _mouse_enable proc
  44.         mov ax,1
  45.         int 33h
  46.         ret
  47. _mouse_enable endp
  48.  
  49. ; ===================================
  50. ; void mouse_disable(void)
  51. ; desabilita a representaçao do mouse
  52. ; ===================================
  53. _mouse_disable proc
  54.         mov ax,2
  55.         int 33h
  56.         ret
  57. _mouse_disable endp
  58.  
  59. ; =====================================================
  60. ; void mouse_read(void)
  61. ; le o mouse e atualiza as variáveis de estado do mouse
  62. ; =====================================================
  63. _mouse_read proc
  64.         mov ax,3
  65.         int 33h
  66.         mov _buttons,bx
  67.         mov _mouse_x,cx
  68.         mov _mouse_y,dx
  69.         ret
  70. _mouse_read endp
  71.  
  72. END